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SUBROUTINE  IDENTIFICATION 

A.  Title:  TCK,  Time  Check,  Identification  G31,  Mod.  01. 

B.  Programmed:  C.  Murray,  13  July  1961,  Lockheed  Missiles  and  Space 
Division. 

C.  Documented:  C.  M.  Chiodini,  11  October  1962,  System  Development 
Corporation. 

PURPOSE 

TCK  deletes  Tracking  Data  Points  from  the  Constant  Pool  of  the  user 
function  when  the  component  times  (T)  are  out  of  range  or  out  of  order. 

USAGE 

A .  Calling  Sequence . 


L 

SLJ  4 

TCK 

L+l 

NOP 

T 

NOP 

AZ 

L+2 

NOP 

EL 

NOP 

SR 

L+3 

Normal  return 

where : 

T,  AZ,  EL,  and  SR  are  the  beginning  addresses  of  the  tracking  point 

components  in  the  Constant  Pool  of  the  user  function. 

B.  Input  Parameters. 

1.  A  Register :  LIST  TEST  value.  A  zero  value  will  result  in  an 
off-line  listing  of  the  deleted  times  modulo  864-00  seconds. 

Any  non-zero  value  in  LIST  TEST  will  bypass  the  output. 

2.  Q  Register:  The  pass  duration  in  floating  point  seconds  if 
UHF  Data  (Format=3)  is  to  be  processed. 

3.  NT:  The  number  of  tracking  data  points.  This  integer  item  is 
in  the  Reference  Pool. 

4.  FORMAT:  The  type  of  radar.  Hiis  integer  item  is  in  the 
Reference  Pool. 
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ITEM  VAEUE 
0 
1 
2 
3 


DATA  TYPE 
Mod  2 

Doppler  (Range -Rate) 

TU0.8 

UHF 


5 .  Tracking  data  points  in  the  Constant  Pool  of  the  user  function. 


SYMBOL 

DEFINITION 

FORMAT 

UNITS 

T 

Machine  Time 

Floating  Point 

Seconds 

AZ 

Azimuth 

Floating  Point 

Radians 

EL 

Elevation/Range 

Floating  Point 

Radians 

SR 

Output . 

_  Rate 
Slant  Range 

Floating  Point 

Feet 

1.  The  number  of  valid  tracking  data  points,  NT  in  the  Reference 
Pool. 

2.  A  set  of  revised  points  in  the  Constant  Pool  of  the  user  function 
with  bad  points  deleted. 

3.  An  off-line  listing  (on  Tape  3)  of  component  Times  in  the 
tracking  data  array  which  were  out  of  range  or  out  of  order. 

This  output  is  optional,  dependent  upon  the  LIST  TEST  value. 

4.  User  Functions. 

ASCENT  DATLAP 

CC00RD  NBURN 

COMPARE  REDUCE 

REENTRY 


METHOD 

TCK  is  subdivided  into  4  major  program  regions  and  an  internal  output 
subroutine.  In  the  first  region,  TCK  obtains  input  parameters  from 
the  user  function  calling  sequence  and  modifies  program  steps  for  data 
point  processing.  It  also  determines  the  type  of  data  to  be  processed, 
and  defines  a  delta  time  for  the  given  type.  In  the  second  region, 

TCK  determines  if  the  component  times  in  the  point  array  are  in 
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ascending  order.  A  point  whose  time  is  out  of  order  is  deleted  from 
the  tracking  data  point  array  in  the  Constant  Pool  of  the  User  Function. 
TCK  then  checks  for  missing  data  points  in  the  third  program  region 
and  computes  a  time  range,  upper  and  lower  limit,  for  each  of  the 
component  times  in  the  array.  A  final  range  is  then  formulated  and  any 
point  whose  time  is  not  within  the  range  is  also  deleted  from  the 
tracking  data  set.  An  output  of  the  rejected  time  is  written  on  tape, 
if  requested,  by  the  TCK  internal  output  subroutine. 

RESTRICTIONS 

A.  The  maximum  number  of  points  processed  by  TCK  is  contingent  upon  t 
the  Constant  Pool  tracking  data  allocation  of  the  user  function. 

The  minimum  number  of  points  processed  by  TCK  is  two  (2).  If 
there  is  one  point  or  less,  TCK  exits  to  the  normal  return  address 
of  the  user  function. 

B.  Index  registers  1,  5  and  6,  pre-TCK  entry  values,  are  saved  and 
restored  at  the  completion  of  TCK  operation. 

C.  The  Reference  Pool  items  NT  and  FORMAT  must  be  set  prior  to  TCK 
operation.  TCK  uses  NT  to  process  all  the  data  points  and  resets 
this  item  with  the  number  of  valid  points  upon  completion.  FORMAT 
(radar  data  type)  is  used  by  TCK  to  define  a  delta  time  (At) 

for  range  determination  and  to  ascertain  if  Doppler  (FR  and  T) 
data  or  other  type  data  points  (SR,  EL,  AZ,  and  T)  sure  to  be 
processed. 

D.  Since  the  component  times  in  the  tracking  data  point  array  must  be 
in  machine  time,  routine  TEDIT,  or  a  similar  conversion  routine, 
must  be  executed  prior  to  TCK.  TEDIT  converts  time  from  fixed 
point  integer  seconds  to  floating  point  machine  time. 

E.  The  components  of  the  tracking  data  point  (T,  AZ,  EL,  SR),  must 
be  in  parallel  structured  tables  in  the  Constant  Pool  of  the 
user  function. 

F.  Two  cells  of  COMMON  are  used  in  TCK  operation. 
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G.  The  following  subroutines  are  used  by  TCK: 

FIX  OUTERR 

FLOAT  OUTPUT 

SUEERR 


TIMING 

TCK  program  execution  time  is  dependent  upon:  (l)  the  number  of 
points  processed,  (2)  the  number  of  times  within  a  given  range,  (3) 
the  number  of  times  outside  a  given  range,  (4)  the  number  of  times  not 
in  ascending  order,  and  (5)  the  off-line  list  option.  Approximately 
1146.7  milli -seconds  are  required  to  process  200  valid  tracking  data 
points  by  TCK. 

STORAGE  REQUIREMENTS 


A.  Program  Allocation. 

Program  Steps 
Storage 
Constants 
TOTAL 


135  cells 
12  cells 

_ 8  cells 

155  cells 


B. 


Program  Storage. 

TAG 

DESCRIPTION 

TCK901 

Delta  Time  (At) 

TCK902 

Current  Upper  Limit 

TCK903 

Current  Lower  Limit 

TCK904 

Final  Upper  Limit 

TCK905 

Final  Lower  Limit 

TCK906 

Time  Factor 

TCK907 

Count 

TCK908 

FORMAT  value  -1 

TCK950 

Program  loop  control  to  process  all  points  in 

TCKMPTS 

the  data  array. 

Number  of  missing  points 

TCKSUM 

Summation  of  mission  points  in  the  data  array 

TCKXRI 

Relative  position  of  a  given  time  in  the  array 
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c. 

Program  Constants. 

TAG 

DESCRIPTION 

FORMAT 

UNITS 

TCK951 

Output  list  heading 

Binary  Coded 

"TIME  CHECK" 

Decimal 

FI 

Constant  used  in 

Floating  Point 

Ms  sing  Point  Check(l.O) 

F2 

Delta  Time  for  Doppler 
data  (2.0) 

Floating  Point 

Seconds 

F4 

Delta  Time  for  TIM18 
or  MODII  data  (4.0) 

Floating  Point 

Seconds 

F.5 

Time  increment  ( . 5 ) 

Floating  Point 

Seconds 

LIMMPTS 

Limit  for  the  number  of 

Floating  Point 

missing  point  between 

successive  times  in  the 

array  (15 .0) 

MZERO 

Program  Mask  used  to 

complement  arithmetic 

values 

(7777  7777  7777  7777) 

Octal 

d864oo 

Number  of  seconds  in  a 

Fixed  Point 

Seconds 

24  hour  period  (86400) 

Integer 

TRANSFER  FUNCTION 

A. 

Terms  and 

Definitions 

1.  i,  j,  k,  1,  m,  p  =  indexers  to  specify  any  given  point  in  the 
tracking  data  array  (relative  position).  In  general,  these 
indexers  have  a  range  from  0  to  NT-1  or  as  indicated. 

2.  NT  =  Number  of  tracking  data  points 

3*  FORMAT  =  Type  of  radar 

0  =  Mod  II 

1  =  Doppler  (Range -Rate) 

2  -  TIM18 

3  =  UHF 
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4.  t  =  Delta  time 

Doppler  =  2  seconds 

Mod  II,  TLM18  =  4  seconds 

UHF  =  Pass  Duration  seconds 
NT-1 


5. 

Tracking 

Data  Point 

T 

=  Time 

h'.  1 . 

=  Elevation  (Range -Rate  for  Doppler) 

AZ 

=  Azimuth  (not  used  for  Doppler) 

SR 

=  Slant  Range  (not  used  for  Doppler 

6. 

FLL 

=  Final  Lower  Limit 

T. 

FUL 

=  Final  Upper  Limit 

8. 

LIMMPTS 

=  Limit  for  number  of  missing  points 
(See  Program  Constants ) 

9. 

LISTTFST 

=  Output  List  Option  Indicator 

B.  Ascending  Order  Check.  Perform  until  points  are  in  order. 

1.  If  Tj+1  >  T^  for  all  i  (i=0,  1,  . NT-2)  Points  are  in  order. 

2.  If  T^+l  £  T^  for  any  i  A  point  is  out  of  order 


Find  worst  point  K  >  J  such  that : 


p-NT-1 

p-NT-1 

E  «pk  +  K-(NT-l) 

E  «pj  +  J-(NT-l) 

p-o 

p-0 

Eliminate  point  K 
(See  Note) 


where: 


<*  .  ■  1  if  T  >  T. 
pk  p  k 

<*  .  -  0  if  T  £  T, 
pk  p  k 

oe  ,  -  1  if  T  >  T, 
PJ  P  J 


0  if  T  £  T. 
P  J 


PJ 


C.  Range  Determination  and  Check 
1.  Compute  Range  (FLL,  FUL) 


j-NT-1  j-NT-1 

Find  i >1  such  that  E  0 . .  s  E  0 . . 

J-0  iJ  J-0 
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-T 


where : 


0iJ  -  1  if  T±-£  •5+At(i+D8um)J<TjSTi+At(HT-l-i) 


ij 


0  otherwise 


-  1  if  ^-[.J+AtCX+Dsum^Tj^+AtCNT-l-i) 


0^  ■  0  otherwise 


p=NT-2 

Dsum  *  E  dp 

p-0 

dp  -  0  if  -1  >  LIMMPTS 

At 

dp  -  -1  otherwise 


j-NT-1  j-NT-1 
a.  If  E  0.  >  E  3., 
j-0  J-0 


j-NT-1  j-NT-1 
b.  If  E  0.  -  E  0.. 
J-0  j-0 

2.  Examine  all  points  K 

a.  If  FLLsCTj<FUL 

b.  If  Tk<FLL 

or 

Tk*FUL 

Note:  To  eliminate  point  K 

1.  For  m  -  K,  K+l,  . NT-2 

a.  If  FORMAT  -  1 


Set: 

FLL-T^ - At ( i+Dsum ) 
FUL-Ti+At(NT-l-i) 

Set: 

FLL-Tj-At^+Dsum) 

FUL-Ti+At(NT-l-i) 


Point  is  in  range. 

Point  is  out  of  range. 
Eliminate  point  K 
(See  Note) 


Set  T 
m 


T 

m+1 


“fc  "  ^Wl 
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b.  If  FORMAT  i  1 


2.  Reduce  number  of  points 

3.  If  LISTTEST  «  0 


Set:  T_  »  T 


m 


m+1 


EL_ 


m 


EL 


m+1 


AZ 


m+1 


SR 


m 


SR 


m+1 


Set:  NT  =  NT-1 

List  Time  Eliminated 
off-line 


VALIDATION  TESTS 

A  test  routine  was  written  to  provide  input  parameters  to  TCK  and  to 
output  program  results  utilizing  the  COP  Defines  function.  Ten  tests 
were  run  consisting  of  a  set  of  ten  tracking  data  points  for  each 
type  of  data.  In  addition,  several  tests  of  200  points  were  made  to 
validate  the  missing  point  computations  in  TCK.  After  analysis  of  the 
test  results,  given  data  points  were  deleted  from  the  tracking  data 
array  when  a  component  time  was  out  of  prder  or  out  of  the  computed 
range.  In  a  like  manner,  no  points  were  rejected  when  the  time 
interval  between  successive  points  was  other  theui  nominal  and  when  the 
number  of  missing  points  was  not  greater  than  the  program  limit  of  15 
points.  The  program  option  to  list  "bad"  times  was  exercised  and 
operated  correctly.  The  number  of  points  (NT  in  the  Reference  Pool) 
was  also  updated  correctly  for  each  point  rejected  by  TCK. 

REFERENCE 

A.  IMSD-447578,  l6o4  Systems  Manual 


PROGRAM 

PAGE 

OUTPUT 

45.01.01 

COMPARE 

45.10.01 

OUTERR 

50.05.01 

SUBERR 

50.06.01 

C COORD 

55.05.21 

REDUCE 

55.25.29 
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B. 


C. 


PROGRAM 

TCK 

TEDIT 

DATLAP 

Manual  of  Operating  Instructions 
Programs . 

PROGRAM 
ASCENT 
NBURN 
REENTRY 

™-(L)-715/008/00,  General 
Description  of  FIX. 

OM-(L) -715/009/00,  General 
Description  of  FLOAT. 


PAGE 

55.35.ll 

55.50.25 

55.60.01 

for  Sate  Hite  Control  Computer 

PAGE 

3.2.1 

3.4.1 

3-6.1 


Purpose  Satellite  Control  Program 
Purpose  Satellite  Control  Program 


X 
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FLCW  CHART 

Terms  and  Definitions: 

i,  j,  k  -  An  integer  to  specify  any  given  element  in  the  tracking 
data  array  (relative  position).  This  value  has  a  range 
of  0  through  NT-1  and  is  set  as  indicated. 

NT  =  Number  of  tracking  data  points 

At  =  Delta  Time 

Doppler  =  2  seconds 
MODII*  TLM18  *  k  seconds 
Pass  Duration 


UHF 

Tracking  Data  Point 
T  *  Time 
EL  =  Elevation 
AZ  *  Azimuth 
SR  -  Slant  Range 


NT-1 


seconds 


Doppler  (Range-Rate) 


MODII 
TIM  18 
UHF 


SUM 
TF 

CLL  - 

CUL 

COUNT 

P 

COUNT 

e 

(t>cll) 

(t>cul) 

NTGTi 

FLL 

FUL 


-  The  number  of  missing  points  between  two  successive  timeB. 

■  The  summation  of  miBSing  points  in  the  tracking  data  set. 

*»  Time  Factor 
»  Current  Lower  Limit 

■  Current  Upper  Limit 

■  Previous  Cound 

■  Current  Count 

An  integer  denoting  the  number  of  Times  in  the  array 
which  are  greater  than  the  current  lower  limit. 

An  integer  denoting  the  number  of  times  in  the  array 
which  are  greater  than  the  current  upper  limit. 

An  integer  denoting  the  number  of  Times  in  the. tracking 
data  set  which  are  greater  than “a  given  time  in  the  set(T^). 
Final  Lower  Limit 
Final  Ufcper  Limit 
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